#pragma once

#include <iostream>
#include <string>
#include <functional>
#include <poll.h>
#include "sock.hpp"

namespace poll_ns
{
    static const int defaultport = 8081;
    static const int num = 2048;
    static const int defaultfd = -1;

    using func_t = std::function<std::string(const std::string &)>;

    class pollServer
    {
    public:
        pollServer(func_t f, int port = defaultport) : _func(f), _port(port), _listensock(-1), _rfds(nullptr)
        {
        }
        void initServer()
        {
            _listensock = Sock::Socket();
            Sock::Bind(_listensock, _port);
            Sock::Listen(_listensock);
            _rfds = new struct pollfd[num];
            for (int i = 0; i < num; i++)
                ResetItem(i);

            _rfds[0].fd = _listensock;
            _rfds[0].events = POLLIN;
        }
        void ResetItem(int i)
        {
            _rfds[i].fd = defaultfd;
            _rfds[i].events = 0;
            _rfds[i].events = 0;
        }
        void Print()
        {
            std::cout << "fd list: ";
            for (int i = 0; i < num; i++)
            {
                if (_rfds[i].fd != defaultfd)
                    std::cout << _rfds[i].fd << " ";
            }
            std::cout << std::endl;
        }
        void Accepter(int listensocket) // 读事件就绪，调用这个函数，获取链接
        {
            logMessage(DEBUG, "accept in");
            // 走到这里accept函数会不会阻塞？？？  不会
            // select 告诉我，listensocket读事件就绪了
            std::string clienip;
            uint16_t clientport = 0;
            int sock = Sock::Accept(listensocket, &clienip, &clientport);
            if (sock < 0)
                return;
            logMessage(NORMAL, "accept sucess [%s : %d]", clienip.c_str(), clientport);

            // TODO, 我们能直接recv/read 吗？不能，整个代码，只有select有资格检测事件是否就绪
            // 将新的sock 托管给select!
            // 将新的sock给select的本质，其实就是将sock，添加到fdarray即可
            int i = 0;
            for (; i < num; i++) // 这里把获取的套接字放到文件描述符的数组
            {
                if (_rfds[i].fd != defaultfd)
                    continue;
                else
                    break;
            }
            if (i == num)
            {
                logMessage(WARNING, "server if full, please wait");
                close(sock);
            }
            else
            {
                _rfds[i].fd = sock;
                _rfds[i].events = POLLIN;
                _rfds[i].revents = 0;
            }
            logMessage(DEBUG, "accept out");
            Print();
        }

        void Recver(int pos)
        {
            // 1. 读取request
            char buffer[1024];
            ssize_t s = recv(_rfds[pos].fd, buffer, sizeof(buffer) - 1, 0); // 这里在进行读取的时候，会不会被阻塞? 不会
            if (s > 0)
            {
                buffer[s] = 0;
                logMessage(NORMAL, "client# %s", buffer);
            }
            else if (s == 0)
            {
                close(_rfds[pos].fd);
                ResetItem(pos);
                logMessage(NORMAL, "client quit");
                return;
            }
            else
            {
                close(_rfds[pos].fd);
                ResetItem(pos);
                logMessage(ERROR, "client quit: %s", strerror(errno));
                return;
            }

            //2. 处理request
            std::string response = _func(buffer);

            // 3.  返回
            // write bug
            write(_rfds[pos].fd, response.c_str(), response.size());
        }
        // 1. HandlerEvent fds中 不仅仅是有一个fd是就绪的，可能存在多个
        // 2. 我们select目前指处理了read事件
        void HandlerReadEvent()
        {
            for (int i = 0; i < num; i++) // 这里是因为不知道哪一个文件描述符就绪了，所以遍历一下
            {
                if (_rfds[i].fd == defaultfd) // 当前没有fd，就看下一个没有fd，有就执行就绪的fd
                    continue;

                if (!(_rfds[i].events & POLLIN))
                    continue;
                // 正常的fd 但是正常的fd不一定就绪了 所以通过位图判断是否就绪
                // 这里目前一定是listensocket，只有这一个
                if (_rfds[i].fd == _listensock && (_rfds[i].revents & POLLIN))
                {
                    Accepter(_listensock);
                }
                // 那么这里就是IO事件
                else if ((_rfds[i].revents & POLLIN))
                {
                    Recver(i);
                }
                else
                {
                }
            }
        }

        void start()
        {
            int timeout = -1;
            for (;;)
            {
                int n = poll(_rfds, num, timeout);
                switch (n)
                {
                case 0:
                    logMessage(NORMAL, "timeout...");
                    break;
                case -1:
                    logMessage(WARNING, "poll error,code:%d, err string: %s", errno, strerror);
                    break;
                default:
                    // 说明有时间就绪了,目前只有一个监听事件就绪了
                    sleep(1);
                    logMessage(NORMAL, "have event ready!");
                    // 获取链接了
                    HandlerReadEvent();
                    break;
                }
            }
        }
        ~pollServer()
        {
            if (_listensock < 0)
                close(_listensock);
        }

    private:
        int _port;
        int _listensock;
        struct pollfd *_rfds;
        func_t _func;
    };
} // namespace poll_ns